|
AutoLisp : Nummern hochzählen
Dober Heinz am 19.10.2005 um 15:17 Uhr (0)
Hallo Lispler ich wiederHabe mir ein Lisp gepastel einfach (bin noch Anfänger)aber se funkt.Hat nur einen Hacken ich kann geade bis Hochzählen.(defun textzahler (aus)(setq copytext (entget aus))(setq txt (cdr (assoc 1 copytext)))(setq txt1 (substr txt 1 1))(setq txt2 (itoa(1+(1+(atoi(substr txt 2 1))))))(setq txt3 (substr txt 3 1))(setq txt4 (itoa(1+(1+(atoi(substr txt 4 1))))))(setq txtzu (strcat txt1 txt2 txt3 txt4)) (setq neuedxf (subst (cons 1 txtzu) (assoc 1 copytext) copytext)) (entmod neuedxf) )(def ...
|
|
AutoLisp : Versetzen auf gemessener Strecke
Dober Heinz am 10.11.2005 um 08:31 Uhr (0)
Hallo habe mir ein Lisp geschrieben, wo ich eine Stecke Messe, diese Strecke dann teile und eine Linie auch dieser Strecke versetzten lass.aber das Versetzten funkt nicht so richtig.(defun c:mteilen (/ tei-len) (setq pt1 (getpoint "
Anfangspunkt eingeben: ")) (setq pt2 (getpoint "
Endpunkt eingeben: ")) (setq lange (distance pt1 pt2)) (setq teil (getint "
Wieviele Linien: ")) (setq tei-len (/ lange teil)) (setq entset (entsel)) (setq Element (car entset)) (setq side_point (getpoint "Punkt auf Seite ange ...
|
|
AutoLisp : Text beim kopieren sichbar
Dober Heinz am 11.11.2005 um 06:57 Uhr (0)
Morgen Lispler FrageHabe ein Lisp mit Text kopieren und um 1 Hochzählen, funkt alles superaber ich seh beim Kopieren den Text nicht,Frage, ist das viel aufwand das Lisp zu ändern das der Text sichtbar wird beim kopieren.Und wie fange ich das an, wenn jemand ein Beispiel hätte wäre superDanke------------------ Heinz
|
|
AutoLisp : Text beim kopieren sichbar
Dober Heinz am 14.11.2005 um 09:18 Uhr (0)
@ MKL-cadhabe das Lisp geschrieben um bei uns die Stromkreisnummern zu kopieren und um eins zu erhöhen.mehr brauchen wir nicht, das mit text und zahl wird sicher auch gehn, aber da ich anfänger bin fehlt mir das noch schwer so was zu schreiben. kanns ja mal versuchen gg ------------------ Heinz
|
|
AutoLisp : Block einfügen und bearbeiten
Dober Heinz am 17.11.2005 um 07:59 Uhr (0)
Hallo LisplerWenn ich eine Block über DesignCenter einfüge, kann ich den dan gleich mit einenm Lisp weiterarbeiten. um Block auf linie ausrichten und die linie dan Brechen.siehe Beilagedanke------------------ Heinz
|
|
AutoLisp : Prüfen ob Zahl
Dober Heinz am 21.12.2005 um 16:23 Uhr (0)
Hallo LisplerHabe diese Lisp zum Prüfen ob Zahl, beim ersten Beispiel funkt es.Aber beim zweiten nicht mehr habe keine Ahnung warum.Bitte um eure Hilfe.----------------------------------------------------------------------(defun str-zahl-am-ende (teststring / zaehler stringende zahl-am-ende) (setq zaehler 0) (while (numberp (read (setq stringende (substr teststring (- (strlen teststring) zaehler))))) (setq zahl-am-ende (read stringende)) (setq zaehler (1+ zaehler)) )zahl-am-ende)----------- ...
|
|
AutoLisp : Prüfen ob Zahl
Dober Heinz am 21.12.2005 um 19:10 Uhr (0)
@ MarcDas Lisp soll Prüfen ob die Strings eine Zahl sind.200.1 sollte rauskommen 1 ist Zahl.200.11 sollte rauskommen 11 ist zahl, die will ich dan um eins erhöhen.mit diesen Symbol geht es ja / aber mit Punkt habe ich ein Problem.bei 200/1 kommt dan 1 raus, die kann ich dan erhöhen.Wird dann 200/2 das funkt super so. danke für Antwort. ------------------ Heinz
|
|
Lisp : Autocad 2008 64 Bit und Lisp
Dober Heinz am 26.02.2007 um 16:21 Uhr (0)
Hallo Da ich weiss, das hier ein paar Betatester unterwegs sind, habe ich eine Frage.Wir Lisp unter Autocad 2008 64 Bit auch unterstützt, bzw. läuft ein Lisp unter Autocad 2008 64 Bit.Danke ------------------ Heinz
|
|
Lisp : Autocad 2008 64 Bit und Lisp
Dober Heinz am 26.02.2007 um 16:29 Uhr (0)
Hallook Danke------------------ Heinz
|
|
Lisp : MapCars Lisp-Tutorials
Dober Heinz am 18.01.2007 um 07:07 Uhr (0)
HalloTolle SacheKaufe sicher eins. ------------------ Heinz
|
|
Lisp : MapCars Lisp-Tutorials
Dober Heinz am 24.01.2007 um 10:25 Uhr (0)
HalloWerden diese Befehle auch enthalten sein. (vl-load-com)heinz------------------ Heinz
|
|
Lisp : Reaktoren
Dober Heinz am 16.01.2008 um 11:17 Uhr (0)
Hallo LisplerBeschäftige mich gerade mit den Reaktoren.Habe folgenden Code von Lisp-Buch kopiert und getestet.Wenn ich eine Bemassung wähle funktioniert der Code, es wird ein Layer angelegt.Aber wenn ich eine Schraff wähle geschied nichts, kann mir bitte einer sagen wo der Fehler liegt.Danke; Anfang der Datei; Funktion zum Setzen des Reaktors(defun add-cmd-reactors( / ) (vl-load-com) (vlr-command-reactor nil ( (:vlr-commandWillStart . cmd-start-callback)) ) (vlr-command-reactor nil ( (:vlr-commandEnded . ...
|
|
Lisp : Reaktoren
Dober Heinz am 18.01.2008 um 06:25 Uhr (0)
Hallo GrassHopperDanke für deine Info.Meine Reaktoren laufen ja schon, nur von Werkzeugpallette einfügen funktioniert nicht.Sonst läuft alles super.DankeP.S Dein Lisp kannte ich schon.------------------ Heinz
|
